home *** CD-ROM | disk | FTP | other *** search
- -- card: 43831 from stack: in.3r
- -- bmap block id: 0
- -- flags: 0000
- -- background id: 3837
- -- name: ChangeCase
-
-
- -- part 1 (button)
- -- low flags: 00
- -- high flags: A004
- -- rect: left=198 top=233 right=284 bottom=258
- -- title width / last selected line: 0
- -- icon id / first selected line: 27056 / 27056
- -- text alignment: 1
- -- font id: 0
- -- text size: 12
- -- style flags: 0
- -- line height: 16
- -- part name: Try it...
- ----- HyperTalk script -----
- on mouseUp
- put changeCase(field "syntax",1) into field "syntax"
- wait 60 ticks
- put changeCase(field "syntax",2) into field "syntax"
- wait 60 ticks
- put changeCase(field "syntax",4) into field "syntax"
- wait 60 ticks
- put changeCase(field "syntax",3) into field "syntax"
- end mouseUp
-
-
-
- -- part contents for background part 10
- ----- text -----
- 53
-
- -- part contents for background part 27
- ----- text -----
- XFCN
-
- -- part contents for background part 5
- ----- text -----
- ChangeCase
-
- -- part contents for background part 6
- ----- text -----
- This XFCN will convert the text in any container to all upper, all lower, capitalized sentences, or capitalized words.
-
-
-
-
-
-
-
- Thanks to:
- Steve Maller, Apple Computer.
- AppleLink: maller1 ΓÇó Delphi: stevemaller ΓÇó MCI Mail: smaller
-
-
- -- part contents for background part 7
- ----- text -----
- Syntax:
-
- Changecase(<text>,<mode>)
-
- <Text> Is Any Text Container
- <Mode> Can Be 1,2,3, Or 4
- 1= Convert To Upper Case
- 2= Convert To Lower Case
- 3= Capitalize Sentences
- 4= Capitalize Words
-
-
-
-
-
-